/ BBS in a Box 4 / BBS in a Box - Macintosh - Volume IV (January 1992) (BBS in a Box).iso / Files / Tele / S / Survey Maker 2.0 / Survey Maker 2.0.rsrc / SCOT_1_Terry

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 80 00 15 41 62 6f 75 74 | 20 53 75 72 76 65 79 20 |...About| Survey |
|00000010| 4d 61 6b 65 72 2e 2e 2e | 04 46 69 6c 65 ed 0c 2f |Maker...|.File../|
|00000020| 4e 4e 65 77 20 53 75 72 | 76 65 79 d2 0e 2f 43 43 |NNew Sur|vey../CC|
|00000030| 6c 6f 73 65 20 53 75 72 | 76 65 79 ad 13 2f 53 53 |lose Sur|vey../SS|
|00000040| 75 72 76 65 79 20 53 69 | 6d 75 6c 61 74 69 6f 6e |urvey Si|mulation|
|00000050| 06 2f 51 51 75 69 74 8f | 11 53 61 76 65 20 73 75 |./QQuit.|.Save su|
|00000060| 72 76 65 79 20 61 73 2e | 2e 2e 00 90 0a 4e 65 77 |rvey as.|.....New|
|00000070| 20 73 75 72 76 65 79 0c | 0c 43 6c 6f 73 65 20 73 | survey.|.Close s|
|00000080| 75 72 76 65 79 6d 0f 53 | 75 72 76 65 79 20 63 6f |urveym.S|urvey co|
|00000090| 6d 6d 61 6e 64 73 11 4a | 75 73 74 20 64 69 73 70 |mmands.J|ust disp|
|000000a0| 6c 61 79 20 74 65 78 74 | 12 42 72 61 6e 63 68 20 |lay text|.Branch |
|000000b0| 69 6d 6d 65 64 69 61 74 | 65 6c 79 44 19 49 66 20 |immediat|elyD.If |
|000000c0| 69 6e 70 75 74 3d 74 65 | 78 74 20 74 68 65 6e 20 |input=te|xt then |
|000000d0| 62 72 61 6e 63 68 22 49 | 66 20 69 6e 70 75 74 3d |branch"I|f input=|
|000000e0| 62 6c 61 6e 6b 2c 20 62 | 72 61 6e 63 68 20 69 6d |blank, b|ranch im|
|000000f0| 6d 65 64 69 61 74 65 6c | 79 75 16 57 72 69 74 65 |mediatel|yu.Write|
|00000100| 20 69 6e 70 75 74 20 74 | 6f 20 73 63 72 61 74 63 | input t|o scratc|
|00000110| 68 00 13 41 70 70 65 6e | 64 20 73 63 72 61 74 63 |h..Appen|d scratc|
|00000120| 68 20 66 69 6c 65 17 53 | 74 6f 70 20 61 6e 64 20 |h file.S|top and |
|00000130| 72 65 74 75 72 6e 20 74 | 6f 20 6d 65 6e 75 14 43 |return t|o menu.C|
|00000140| 6c 65 61 72 20 61 6e 64 | 20 73 74 61 72 74 20 6f |lear and| start o|
|00000150| 76 65 72 02 09 47 65 74 | 20 69 6e 70 75 74 11 49 |ver..Get| input.I|
|00000160| 6e 70 75 74 20 6f 6e 6c | 79 20 59 20 6f 72 20 4e |nput onl|y Y or N|
|00000170| 11 49 6e 70 75 74 20 6f | 6e 6c 79 20 72 65 74 75 |.Input o|nly retu|
|00000180| 72 6e 21 57 72 69 74 65 | 20 74 65 78 74 20 74 6f |rn!Write| text to|
|00000190| 20 73 63 72 61 74 63 68 | 20 77 69 74 68 20 72 65 | scratch| with re|
|000001a0| 74 75 72 6e 25 57 72 69 | 74 65 20 74 65 78 74 20 |turn%Wri|te text |
|000001b0| 74 6f 20 73 63 72 61 74 | 63 68 20 77 69 74 68 20 |to scrat|ch with |
|000001c0| 6f 75 74 20 72 65 74 75 | 72 6e 13 54 65 6d 70 6f |out retu|rn.Tempo|
|000001d0| 61 72 79 20 74 69 6d 65 | 20 72 61 69 73 65 12 50 |ary time| raise.P|
|000001e0| 65 72 6d 61 6e 74 20 74 | 69 6d 65 20 72 61 69 73 |ermant t|ime rais|
|000001f0| 65 6d 14 54 65 6d 70 6f | 61 72 79 20 6c 65 76 65 |em.Tempo|ary leve|
|00000200| 6c 20 72 61 69 73 65 75 | 13 50 65 72 6d 61 6e 74 |l raiseu|.Permant|
|00000210| 20 6c 65 76 65 6c 20 72 | 61 69 73 65 16 42 72 61 | level r|aise.Bra|
|00000220| 6e 63 68 20 74 6f 20 61 | 6e 6f 74 68 65 72 20 6d |nch to a|nother m|
|00000230| 65 6e 75 df 4c 20 20 20 | 20 20 20 30 2e 2e 2e 2e |enu.L   |   0....|
|00000240| 2e 2e 2e 2e 31 2e 2e 2e | 2e 2e 2e 2e 2e 2e 32 2e |....1...|......2.|
|00000250| 2e 2e 2e 2e 2e 2e 2e 2e | 33 2e 2e 2e 2e 2e 2e 2e |........|3.......|
|00000260| 2e 2e 34 2e 2e 2e 2e 2e | 2e 2e 2e 2e 35 2e 2e 2e |..4.....|....5...|
|00000270| 2e 2e 2e 2e 2e 2e 36 2e | 2e 2e 2e 2e 2e 2e 2e 2e |......6.|........|
|00000280| 37 61 06 54 65 78 74 3a | 20 20 15 2a 2a 44 69 73 |7a.Text:|  .**Dis|
|00000290| 70 6c 61 79 20 74 65 78 | 74 20 6f 6e 6c 79 2a 2a |play tex|t only**|
|000002a0| 04 54 45 58 54 74 01 31 | 01 30 03 4e 49 4c 2c 42 |.TEXTt.1|.0.NIL,B|
|000002b0| 72 61 6e 63 68 20 74 6f | 20 77 68 69 63 68 20 63 |ranch to| which c|
|000002c0| 6f 6d 6d 61 6e 64 3f 3b | 72 65 74 75 72 6e 20 69 |ommand?;|return i|
|000002d0| 66 20 6e 6f 74 20 6b 6e | 6f 77 6e 00 0a 2a 2a 42 |f not kn|own..**B|
|000002e0| 72 61 6e 63 68 2a 2a 4f | 06 42 52 41 4e 43 48 61 |ranch**O|.BRANCHa|
|000002f0| 01 32 03 4e 49 4c 01 30 | 0a 43 48 41 4e 47 45 20 |.2.NIL.0|.CHANGE |
|00000300| 4d 45 21 4c 21 45 6e 74 | 65 72 20 63 68 61 72 61 |ME!L!Ent|er chara|
|00000310| 63 74 65 72 73 20 74 68 | 61 74 20 6d 75 73 74 20 |cters th|at must |
|00000320| 6d 61 74 63 68 3a 2a 42 | 72 61 6e 63 68 20 77 68 |match:*B|ranch wh|
|00000330| 65 72 65 20 69 66 20 6d | 61 74 63 68 3f 3b 72 65 |ere if m|atch?;re|
|00000340| 74 75 72 6e 20 69 66 20 | 6e 6f 74 20 6b 6e 6f 77 |turn if |not know|
|00000350| 6e 2e 0a 43 48 41 4e 47 | 45 20 4d 45 21 76 1d 2a |n..CHANG|E ME!v.*|
|00000360| 2a 49 66 20 69 6e 70 75 | 74 3d 74 65 78 74 20 74 |*If inpu|t=text t|
|00000370| 68 65 6e 20 62 72 61 6e | 63 68 2a 2a 0b 49 6e 70 |hen bran|ch**.Inp|
|00000380| 75 74 42 72 61 6e 63 68 | 01 33 01 30 38 42 72 61 |utBranch|.3.08Bra|
|00000390| 6e 63 68 20 77 68 65 72 | 65 20 69 66 20 6c 61 73 |nch wher|e if las|
|000003a0| 74 20 69 6e 70 75 74 20 | 69 73 20 65 6d 70 74 79 |t input |is empty|
|000003b0| 3f 3b 72 65 74 75 72 6e | 20 69 66 20 6e 6f 74 20 |?;return| if not |
|000003c0| 6b 6e 6f 77 6e 49 0a 43 | 48 41 4e 47 45 20 4d 45 |knownI.C|HANGE ME|
|000003d0| 21 03 06 42 72 61 6e 63 | 68 07 13 2a 2a 42 72 61 |!..Branc|h..**Bra|
|000003e0| 6e 63 68 20 69 66 20 65 | 6d 70 74 79 2a 2a 01 34 |nch if e|mpty**.4|
|000003f0| 01 30 1f 2a 2a 57 72 69 | 74 65 20 69 6e 70 75 74 |.0.**Wri|te input|
|00000400| 20 74 6f 20 73 63 72 61 | 74 63 68 20 66 69 6c 65 | to scra|tch file|
|00000410| 2a 2a 0c 57 72 69 74 65 | 53 63 72 61 74 63 68 03 |**.Write|Scratch.|
|00000420| 01 35 03 4e 49 4c 01 30 | 03 4e 49 4c 23 2a 2a 57 |.5.NIL.0|.NIL#**W|
|00000430| 72 69 74 65 20 73 63 72 | 61 74 63 68 20 66 69 6c |rite scr|atch fil|
|00000440| 65 20 74 6f 20 2e 52 45 | 53 20 66 69 6c 65 2a 2a |e to .RE|S file**|
|00000450| 06 41 70 70 65 6e 64 4f | 01 36 03 4e 49 4c 01 30 |.AppendO|.6.NIL.0|
|00000460| 03 4e 49 4c 17 2a 2a 52 | 65 74 75 72 6e 20 74 6f |.NIL.**R|eturn to|
|00000470| 20 6c 61 73 74 20 6d 65 | 6e 75 2a 2a 0c 52 65 74 | last me|nu**.Ret|
|00000480| 75 72 6e 54 6f 4d 65 6e | 75 45 01 37 03 4e 49 4c |urnToMen|uE.7.NIL|
|00000490| 01 30 03 4e 49 4c 25 2a | 2a 43 6c 65 61 72 20 73 |.0.NIL%*|*Clear s|
|000004a0| 63 72 61 74 63 68 20 66 | 69 6c 65 20 61 6e 64 20 |cratch f|ile and |
|000004b0| 73 74 61 72 74 20 6f 76 | 65 72 2a 2a 0c 43 6c 65 |start ov|er**.Cle|
|000004c0| 61 72 53 63 72 61 74 63 | 68 04 01 38 03 4e 49 4c |arScratc|h..8.NIL|
|000004d0| 01 30 03 4e 49 4c 4c 20 | 20 20 20 20 20 30 2e 2e |.0.NILL |     0..|
|000004e0| 2e 2e 2e 2e 2e 2e 31 2e | 2e 2e 2e 2e 2e 2e 2e 2e |......1.|........|
|000004f0| 32 2e 2e 2e 2e 2e 2e 2e | 2e 2e 33 2e 2e 2e 2e 2e |2.......|..3.....|
|00000500| 2e 2e 2e 2e 34 2e 2e 2e | 2e 2e 2e 2e 2e 2e 35 2e |....4...|......5.|
|00000510| 2e 2e 2e 2e 2e 2e 2e 2e | 36 2e 2e 2e 2e 2e 2e 2e |........|6.......|
|00000520| 2e 2e 37 43 06 54 65 78 | 74 3a 20 4c 21 48 6f 77 |..7C.Tex|t: L!How|
|00000530| 20 6d 61 6e 79 20 63 68 | 61 72 61 63 74 65 72 73 | many ch|aracters|
|00000540| 20 63 61 6e 20 68 65 20 | 65 6e 74 65 72 3f 0d 2a | can he |enter?.*|
|00000550| 2a 47 65 74 20 69 6e 70 | 75 74 2a 2a 08 47 65 74 |*Get inp|ut**.Get|
|00000560| 49 6e 70 75 74 44 01 39 | 03 4e 49 4c 4c 20 20 20 |InputD.9|.NILL   |
|00000570| 20 20 20 30 2e 2e 2e 2e | 2e 2e 2e 2e 31 2e 2e 2e |   0....|....1...|
|00000580| 2e 2e 2e 2e 2e 2e 32 2e | 2e 2e 2e 2e 2e 2e 2e 2e |......2.|........|
|00000590| 33 2e 2e 2e 2e 2e 2e 2e | 2e 2e 34 2e 2e 2e 2e 2e |3.......|..4.....|
|000005a0| 2e 2e 2e 2e 35 2e 2e 2e | 2e 2e 2e 2e 2e 2e 36 2e |....5...|......6.|
|000005b0| 2e 2e 2e 2e 2e 2e 2e 2e | 37 46 06 54 65 78 74 3a |........|7F.Text:|
|000005c0| 20 54 09 49 6e 70 75 74 | 20 59 2f 4e 10 2a 2a 49 | T.Input| Y/N.**I|
|000005d0| 6e 70 75 74 20 59 20 6f | 72 20 4e 2a 2a 49 02 31 |nput Y o|r N**I.1|
|000005e0| 30 45 01 31 03 4e 49 4c | 4c 20 20 20 20 20 20 30 |0E.1.NIL|L      0|
|000005f0| 2e 2e 2e 2e 2e 2e 2e 2e | 31 2e 2e 2e 2e 2e 2e 2e |........|1.......|
|00000600| 2e 2e 32 2e 2e 2e 2e 2e | 2e 2e 2e 2e 33 2e 2e 2e |..2.....|....3...|
|00000610| 2e 2e 2e 2e 2e 2e 34 2e | 2e 2e 2e 2e 2e 2e 2e 2e |......4.|........|
|00000620| 35 2e 2e 2e 2e 2e 2e 2e | 2e 2e 36 2e 2e 2e 2e 2e |5.......|..6.....|
|00000630| 2e 2e 2e 2e 37 09 06 54 | 65 78 74 3a 20 56 15 2a |....7..T|ext: V.*|
|00000640| 2a 45 6e 74 65 72 20 6f | 6e 6c 79 20 61 20 3c 43 |*Enter o|nly a <C|
|00000650| 52 3e 2a 2a 09 45 6e 74 | 65 72 3c 43 52 3e 02 31 |R>**.Ent|er<CR>.1|
|00000660| 31 54 01 30 03 4e 49 4c | 25 54 65 78 74 20 74 6f |1T.0.NIL|%Text to|
|00000670| 20 62 65 20 65 6e 74 65 | 72 65 64 20 69 6e 74 6f | be ente|red into|
|00000680| 20 73 63 72 61 74 63 68 | 20 66 69 6c 65 3a 14 2a | scratch| file:.*|
|00000690| 2a 57 72 69 74 65 20 74 | 6f 20 73 63 72 61 74 63 |*Write t|o scratc|
|000006a0| 68 2a 2a 54 10 57 72 69 | 74 65 20 74 6f 20 73 63 |h**T.Wri|te to sc|
|000006b0| 72 61 74 63 68 45 02 31 | 32 59 01 30 03 4e 49 4c |ratchE.1|2Y.0.NIL|
|000006c0| 25 54 65 78 74 20 74 6f | 20 62 65 20 65 6e 74 65 |%Text to| be ente|
|000006d0| 72 65 64 20 69 6e 74 6f | 20 73 63 72 61 74 63 68 |red into| scratch|
|000006e0| 20 66 69 6c 65 3a 14 2a | 2a 57 72 69 74 65 20 74 | file:.*|*Write t|
|000006f0| 6f 20 73 63 72 61 74 63 | 68 2a 2a 42 10 57 72 69 |o scratc|h**B.Wri|
|00000700| 74 65 20 74 6f 20 73 63 | 72 61 74 63 68 03 02 31 |te to sc|ratch..1|
|00000710| 33 03 01 30 03 4e 49 4c | 0e 52 61 69 73 65 20 74 |3..0.NIL|.Raise t|
|00000720| 69 6d 65 20 74 6f 3f 56 | 18 2a 2a 54 65 6d 70 6f |ime to?V|.**Tempo|
|00000730| 72 61 72 79 20 74 69 6d | 65 20 72 61 69 73 65 2a |rary tim|e raise*|
|00000740| 2a 04 0d 54 65 6d 70 54 | 69 6d 65 52 61 69 73 65 |*..TempT|imeRaise|
|00000750| 02 31 34 4e 01 30 03 4e | 49 4c 0e 52 61 69 73 65 |.14N.0.N|IL.Raise|
|00000760| 20 74 69 6d 65 20 74 6f | 3f 4d 18 2a 2a 50 65 72 | time to|?M.**Per|
|00000770| 6d 61 6e 65 6e 74 20 74 | 69 6d 65 20 72 61 69 73 |manent t|ime rais|
|00000780| 65 2a 2a 46 0d 50 65 72 | 6d 54 69 6d 65 52 61 69 |e**F.Per|mTimeRai|
|00000790| 73 65 02 31 35 52 01 30 | 03 4e 49 4c 0f 52 61 69 |se.15R.0|.NIL.Rai|
|000007a0| 73 65 20 6c 65 76 65 6c | 20 74 6f 3f 19 2a 2a 54 |se level| to?.**T|
|000007b0| 65 6d 70 6f 72 61 72 79 | 20 6c 65 76 65 6c 20 72 |emporary| level r|
|000007c0| 61 69 73 65 2a 2a 0e 54 | 65 6d 70 4c 65 76 65 6c |aise**.T|empLevel|
|000007d0| 52 61 69 73 65 54 02 31 | 36 41 01 30 03 4e 49 4c |RaiseT.1|6A.0.NIL|
|000007e0| 0f 52 61 69 73 65 20 6c | 65 76 65 6c 20 74 6f 3f |.Raise l|evel to?|
|000007f0| 19 2a 2a 50 72 65 6d 61 | 6e 65 6e 74 20 6c 65 76 |.**Prema|nent lev|
|00000800| 65 6c 20 72 61 69 73 65 | 2a 2a 0e 54 65 6d 70 4c |el raise|**.TempL|
|00000810| 65 76 65 6c 52 61 69 73 | 65 6d 02 31 37 65 01 30 |evelRais|em.17e.0|
|00000820| 03 4e 49 4c 4c 20 20 20 | 20 20 20 30 2e 2e 2e 2e |.NILL   |   0....|
|00000830| 2e 2e 2e 2e 31 2e 2e 2e | 2e 2e 2e 2e 2e 2e 32 2e |....1...|......2.|
|00000840| 2e 2e 2e 2e 2e 2e 2e 2e | 33 2e 2e 2e 2e 2e 2e 2e |........|3.......|
|00000850| 2e 2e 34 2e 2e 2e 2e 2e | 2e 2e 2e 2e 35 2e 2e 2e |..4.....|....5...|
|00000860| 2e 2e 2e 2e 2e 2e 36 2e | 2e 2e 2e 2e 2e 2e 2e 2e |......6.|........|
|00000870| 37 00 06 54 65 78 74 3a | 20 e0 12 2a 2a 42 72 61 |7..Text:| ..**Bra|
|00000880| 6e 63 68 20 74 6f 20 4d | 65 6e 75 2a 2a 00 0e 42 |nch to M|enu**..B|
|00000890| 72 61 6e 63 68 20 74 6f | 20 4d 65 6e 75 00 02 31 |ranch to| Menu..1|
|000008a0| 38 00 01 30 03 4e 49 4c | 12 41 62 6f 75 74 20 53 |8..0.NIL|.About S|
|000008b0| 75 72 76 65 79 20 4d 61 | 6b 65 72 07 15 41 62 6f |urvey Ma|ker..Abo|
|000008c0| 75 74 20 53 75 72 76 65 | 79 20 4d 61 6b 65 72 2e |ut Surve|y Maker.|
|000008d0| 2e 2e 2a 54 68 65 20 63 | 6f 6e 63 65 70 74 20 77 |..*The c|oncept w|
|000008e0| 61 73 20 74 68 6f 75 67 | 68 74 20 75 70 20 62 79 |as thoug|ht up by|
|000008f0| 20 53 63 6f 74 74 20 57 | 61 74 73 6f 6e 00 2a 62 | Scott W|atson.*b|
|00000900| 75 74 20 68 65 20 64 69 | 64 20 6e 6f 74 68 69 6e |ut he di|d nothin|
|00000910| 67 20 61 62 6f 75 74 20 | 69 74 2c 20 73 6f 20 64 |g about |it, so d|
|00000920| 65 63 69 64 65 64 20 74 | 6f 00 2c 64 6f 20 73 6f |ecided t|o.,do so|
|00000930| 6d 65 74 68 69 6e 67 20 | 61 62 6f 75 74 20 69 74 |mething |about it|
|00000940| 2e 20 20 54 68 65 20 69 | 64 65 61 20 69 73 20 61 |.  The i|dea is a|
|00000950| 6c 6c 20 68 69 73 2c 00 | 23 62 75 74 20 74 68 65 |ll his,.|#but the|
|00000960| 20 69 6d 70 6c 65 6d 65 | 6e 74 61 74 69 6f 6e 20 | impleme|ntation |
|00000970| 69 73 20 61 6c 6c 20 6d | 69 6e 65 2e 2a 49 66 20 |is all m|ine.*If |
|00000980| 79 6f 75 20 75 73 65 20 | 74 68 69 73 20 70 72 6f |you use |this pro|
|00000990| 67 72 61 6d 2c 20 61 6c | 6c 20 49 20 61 73 6b 20 |gram, al|l I ask |
|000009a0| 69 73 20 74 68 61 74 00 | 29 79 6f 75 20 73 65 6e |is that.|)you sen|
|000009b0| 64 20 6d 65 20 61 20 6c | 65 74 74 65 72 20 6f 72 |d me a l|etter or|
|000009c0| 20 61 20 70 6f 73 74 63 | 61 72 64 20 73 61 79 69 | a postc|ard sayi|
|000009d0| 6e 67 2c 69 66 20 79 6f | 75 20 6c 69 6b 65 20 69 |ng,if yo|u like i|
|000009e0| 74 2c 20 61 6e 64 20 77 | 68 61 74 2c 20 69 66 20 |t, and w|hat, if |
|000009f0| 61 6e 79 74 68 69 6e 67 | 2c 20 6e 65 65 64 73 00 |anything|, needs.|
|00000a00| 2d 69 6d 70 72 6f 76 65 | 6d 65 6e 74 2e 20 20 54 |-improve|ment.  T|
|00000a10| 68 61 6e 6b 73 20 61 20 | 6c 6f 74 2c 20 49 20 64 |hanks a |lot, I d|
|00000a20| 6f 6e 27 74 20 61 73 6b | 20 6d 75 63 68 2c 2a 6a |on't ask| much,*j|
|00000a30| 75 73 74 20 74 65 6c 6c | 20 6d 65 20 69 66 20 79 |ust tell| me if y|
|00000a40| 6f 75 20 6c 69 6b 65 20 | 69 74 2e 20 20 4f 72 20 |ou like |it.  Or |
|00000a50| 79 6f 75 20 63 6f 75 6c | 64 20 2c 63 61 6c 6c 20 |you coul|d ,call |
|00000a60| 6d 79 20 42 42 53 2c 20 | 50 68 6f 65 6e 69 78 20 |my BBS, |Phoenix |
|00000a70| 42 42 53 2c 20 61 74 20 | 28 34 30 38 29 20 32 35 |BBS, at |(408) 25|
|00000a80| 35 2d 37 32 30 38 2e 00 | 0a 4e 65 77 20 53 75 72 |5-7208..|.New Sur|
|00000a90| 76 65 79 00 0c 43 6c 6f | 73 65 20 53 75 72 76 65 |vey..Clo|se Surve|
|00000aa0| 79 6e 0f 53 75 72 76 65 | 79 20 43 6f 6d 6d 61 6e |yn.Surve|y Comman|
|00000ab0| 64 73 35 54 68 69 73 20 | 73 6f 66 74 77 61 72 65 |ds5This |software|
|00000ac0| 20 77 61 73 20 63 72 65 | 61 74 65 64 20 75 73 69 | was cre|ated usi|
|00000ad0| 6e 67 20 74 68 65 20 5a | 42 61 73 69 63 aa 20 43 |ng the Z|Basic. C|
|00000ae0| 6f 6d 70 69 6c 65 72 2e | 3a 50 6f 72 74 69 6f 6e |ompiler.|:Portion|
|00000af0| 73 20 6f 66 20 74 68 69 | 73 20 63 6f 64 65 20 61 |s of thi|s code a|
|00000b00| 72 65 20 43 6f 70 79 72 | 69 67 68 74 65 64 2c 20 |re Copyr|ighted, |
|00000b10| 31 39 38 35 20 62 79 20 | 5a 65 64 63 6f 72 20 49 |1985 by |Zedcor I|
|00000b20| 6e 63 2e 61 3f 43 72 65 | 61 74 65 64 20 62 79 20 |nc.a?Cre|ated by |
|00000b30| 4d 61 72 6b 20 43 6f 6f | 6b 73 6f 6e 2c 20 53 79 |Mark Coo|kson, Sy|
|00000b40| 73 6f 70 20 6f 66 20 50 | 68 6f 65 6e 69 78 20 66 |sop of P|hoenix f|
|00000b50| 6f 72 20 6d 79 20 6f 77 | 6e 20 61 6d 75 73 65 6d |or my ow|n amusem|
|00000b60| 65 6e 74 2e 3c 59 6f 75 | 20 63 61 6e 20 64 6f 20 |ent.<You| can do |
|00000b70| 77 68 61 74 65 76 65 72 | 20 79 6f 75 20 77 61 6e |whatever| you wan|
|00000b80| 74 20 77 69 74 68 20 69 | 74 2c 20 69 66 20 79 6f |t with i|t, if yo|
|00000b90| 75 20 6c 69 6b 65 20 69 | 74 20 74 68 6f 75 67 68 |u like i|t though|
|00000ba0| 2c 36 40 70 6c 65 61 73 | 65 20 73 65 6e 64 20 6d |,6@pleas|e send m|
|00000bb0| 65 20 61 20 70 6f 73 74 | 63 61 72 64 20 74 65 6c |e a post|card tel|
|00000bc0| 6c 69 6e 67 20 77 68 6f | 20 79 6f 75 20 61 72 65 |ling who| you are|
|00000bd0| 20 61 6e 64 20 77 68 61 | 74 20 79 6f 75 20 6c 69 | and wha|t you li|
|00000be0| 6b 65 2c 2e 36 64 6f 6e | 27 74 20 6c 69 6b 65 2c |ke,.6don|'t like,|
|00000bf0| 20 61 6e 64 20 77 6f 75 | 6c 64 20 6c 69 6b 65 20 | and wou|ld like |
|00000c00| 74 6f 20 73 65 65 20 69 | 6e 20 61 20 66 75 74 75 |to see i|n a futu|
|00000c10| 72 65 20 76 65 72 73 69 | 6f 6e 2e f2 39 4d 79 20 |re versi|on..9My |
|00000c20| 61 64 64 72 65 73 73 20 | 69 73 20 31 30 38 34 32 |address |is 10842|
|00000c30| 20 45 2e 20 45 73 74 61 | 74 65 73 20 44 72 69 76 | E. Esta|tes Driv|
|00000c40| 65 20 43 75 70 65 72 74 | 69 6e 6f 2c 20 43 41 20 |e Cupert|ino, CA |
|00000c50| 39 35 30 31 34 2e 34 4f | 72 20 79 6f 75 20 63 6f |95014.4O|r you co|
|00000c60| 75 6c 64 20 63 61 6c 6c | 20 6d 79 20 42 42 53 20 |uld call| my BBS |
|00000c70| 61 74 20 34 30 38 2d 32 | 35 35 2d 37 32 30 38 2c |at 408-2|55-7208,|
|00000c80| 20 32 34 30 30 20 62 61 | 75 64 2e 00 04 54 45 58 | 2400 ba|ud...TEX|
|00000c90| 54 00 0c 53 63 72 61 74 | 63 68 20 66 69 6c 65 7f |T..Scrat|ch file.|
|00000ca0| 04 2e 52 45 53 80 54 49 | 6e 76 61 6c 69 64 20 73 |..RES.TI|nvalid s|
|00000cb0| 75 72 76 65 79 20 63 6f | 6d 6d 61 6e 64 21 21 21 |urvey co|mmand!!!|
|00000cc0| 20 20 4f 72 20 61 74 20 | 6c 65 61 73 74 20 69 74 |  Or at |least it|
|00000cd0| 20 64 69 64 6e 27 74 20 | 65 78 69 73 74 20 77 68 | didn't |exist wh|
|00000ce0| 65 6e 20 74 68 69 73 20 | 70 72 6f 67 72 61 6d 20 |en this |program |
|00000cf0| 77 61 73 20 6d 61 64 65 | 2e 2e 2e f0 3f 41 62 6f |was made|....?Abo|
|00000d00| 76 65 20 65 6e 74 72 69 | 65 73 20 6d 61 64 65 20 |ve entri|es made |
|00000d10| 62 79 3a 20 53 75 72 76 | 65 79 20 4d 61 6b 65 72 |by: Surv|ey Maker|
|00000d20| 27 73 20 53 75 72 76 65 | 79 20 53 69 6d 75 6c 61 |'s Surve|y Simula|
|00000d30| 74 69 6f 6e 20 63 6f 6d | 6d 61 6e 64 14 2d 2d 2d |tion com|mand.---|
|00000d40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d50| 2d 75 0c 53 63 72 61 74 | 63 68 20 66 69 6c 65 c2 |-u.Scrat|ch file.|
|00000d60| 43 53 75 72 76 65 79 20 | 73 74 6f 70 73 20 61 6e |CSurvey |stops an|
|00000d70| 64 20 67 6f 65 73 20 62 | 61 63 6b 20 74 6f 20 74 |d goes b|ack to t|
|00000d80| 68 65 20 6d 65 6e 75 20 | 74 68 69 73 20 73 75 72 |he menu |this sur|
|00000d90| 76 65 79 20 77 61 73 20 | 63 68 6f 73 65 6e 20 66 |vey was |chosen f|
|00000da0| 72 6f 6d 2e 0c 53 63 72 | 61 74 63 68 20 66 69 6c |rom..Scr|atch fil|
|00000db0| 65 28 00 1c 00 e8 01 59 | 01 4e 4d 42 65 63 61 75 |e(.....Y|.NMBecau|
|00000dc0| 73 65 20 74 68 65 20 73 | 63 72 61 74 63 68 20 66 |se the s|cratch f|
|00000dd0| 69 6c 65 20 68 61 73 20 | 62 65 65 6e 20 61 70 70 |ile has |been app|
|00000de0| 65 6e 65 64 20 74 6f 20 | 74 68 65 20 2e 52 45 53 |ened to |the .RES|
|00000df0| 20 66 69 6c 65 2c 20 74 | 68 65 20 63 61 6c 6c 65 | file, t|he calle|
|00000e00| 72 27 73 20 74 69 6d 65 | 4e 6c 69 6d 69 74 20 63 |r's time|Nlimit c|
|00000e10| 61 6e 27 74 20 62 65 20 | 72 61 69 73 65 64 2e 20 |an't be |raised. |
|00000e20| 20 41 6c 6c 20 79 6f 75 | 20 68 61 76 65 20 74 6f | All you| have to|
|00000e30| 20 64 6f 20 69 73 20 6d | 6f 76 65 20 74 68 65 20 | do is m|ove the |
|00000e40| 72 61 69 73 65 20 74 69 | 6d 65 20 6c 69 6d 69 74 |raise ti|me limit|
|00000e50| 20 62 65 66 6f 72 65 70 | 28 74 68 65 20 63 6f 6d | beforep|(the com|
|00000e60| 6d 61 6e 64 20 74 6f 20 | 61 70 70 65 6e 65 64 20 |mand to |appened |
|00000e70| 74 68 65 20 73 63 72 61 | 74 63 68 20 66 69 6c 65 |the scra|tch file|
|00000e80| 2e d8 31 43 61 6c 6c 65 | 72 27 73 20 74 69 6d 65 |..1Calle|r's time|
|00000e90| 20 6c 69 6d 69 74 20 68 | 61 73 20 62 65 65 6e 20 | limit h|as been |
|00000ea0| 74 65 6d 70 6f 72 61 6c | 6c 79 20 72 61 69 73 65 |temporal|ly raise|
|00000eb0| 64 20 74 6f 4d 42 65 63 | 61 75 73 65 20 74 68 65 |d toMBec|ause the|
|00000ec0| 20 73 63 72 61 74 63 68 | 20 66 69 6c 65 20 68 61 | scratch| file ha|
|00000ed0| 73 20 62 65 65 6e 20 61 | 70 70 65 6e 65 64 20 74 |s been a|ppened t|
|00000ee0| 6f 20 74 68 65 20 2e 52 | 45 53 20 66 69 6c 65 2c |o the .R|ES file,|
|00000ef0| 20 74 68 65 20 63 61 6c | 6c 65 72 27 73 20 74 69 | the cal|ler's ti|
|00000f00| 6d 65 4e 6c 69 6d 69 74 | 20 63 61 6e 27 74 20 62 |meNlimit| can't b|
|00000f10| 65 20 72 61 69 73 65 64 | 2e 20 20 41 6c 6c 20 79 |e raised|.  All y|
|00000f20| 6f 75 20 68 61 76 65 20 | 74 6f 20 64 6f 20 69 73 |ou have |to do is|
|00000f30| 20 6d 6f 76 65 20 74 68 | 65 20 72 61 69 73 65 20 | move th|e raise |
|00000f40| 74 69 6d 65 20 6c 69 6d | 69 74 20 62 65 66 6f 72 |time lim|it befor|
|00000f50| 65 00 28 74 68 65 20 63 | 6f 6d 6d 61 6e 64 20 74 |e.(the c|ommand t|
|00000f60| 6f 20 61 70 70 65 6e 65 | 64 20 74 68 65 20 73 63 |o appene|d the sc|
|00000f70| 72 61 74 63 68 20 66 69 | 6c 65 2e 32 30 43 61 6c |ratch fi|le.20Cal|
|00000f80| 6c 65 72 27 73 20 74 69 | 6d 65 20 6c 69 6d 69 74 |ler's ti|me limit|
|00000f90| 20 68 61 73 20 62 65 65 | 6e 20 70 65 72 6d 61 6e | has bee|n perman|
|00000fa0| 74 6c 79 20 72 61 69 73 | 65 64 20 74 6f 40 4d 42 |tly rais|ed to@MB|
|00000fb0| 65 63 61 75 73 65 20 74 | 68 65 20 73 63 72 61 74 |ecause t|he scrat|
|00000fc0| 63 68 20 66 69 6c 65 20 | 68 61 73 20 62 65 65 6e |ch file |has been|
|00000fd0| 20 61 70 70 65 6e 65 64 | 20 74 6f 20 74 68 65 20 | appened| to the |
|00000fe0| 2e 52 45 53 20 66 69 6c | 65 2c 20 74 68 65 20 63 |.RES fil|e, the c|
|00000ff0| 61 6c 6c 65 72 27 73 20 | 74 69 6d 65 4e 6c 69 6d |aller's |timeNlim|
|00001000| 69 74 20 63 61 6e 27 74 | 20 62 65 20 72 61 69 73 |it can't| be rais|
|00001010| 65 64 2e 20 20 41 6c 6c | 20 79 6f 75 20 68 61 76 |ed.  All| you hav|
|00001020| 65 20 74 6f 20 64 6f 20 | 69 73 20 6d 6f 76 65 20 |e to do |is move |
|00001030| 74 68 65 20 72 61 69 73 | 65 20 74 69 6d 65 20 6c |the rais|e time l|
|00001040| 69 6d 69 74 20 62 65 66 | 6f 72 65 00 28 74 68 65 |imit bef|ore.(the|
|00001050| 20 63 6f 6d 6d 61 6e 64 | 20 74 6f 20 61 70 70 65 | command| to appe|
|00001060| 6e 65 64 20 74 68 65 20 | 73 63 72 61 74 63 68 20 |ned the |scratch |
|00001070| 66 69 6c 65 2e 00 30 43 | 61 6c 6c 65 72 27 73 20 |file..0C|aller's |
|00001080| 63 6c 65 61 72 65 6e 63 | 65 20 68 61 73 20 62 65 |clearenc|e has be|
|00001090| 65 6e 20 74 65 6d 70 6f | 72 61 6c 6c 79 20 72 61 |en tempo|rally ra|
|000010a0| 69 73 65 64 20 74 6f 00 | 4d 42 65 63 61 75 73 65 |ised to.|MBecause|
|000010b0| 20 74 68 65 20 73 63 72 | 61 74 63 68 20 66 69 6c | the scr|atch fil|
|000010c0| 65 20 68 61 73 20 62 65 | 65 6e 20 61 70 70 65 6e |e has be|en appen|
|000010d0| 65 64 20 74 6f 20 74 68 | 65 20 2e 52 45 53 20 66 |ed to th|e .RES f|
|000010e0| 69 6c 65 2c 20 74 68 65 | 20 63 61 6c 6c 65 72 27 |ile, the| caller'|
|000010f0| 73 20 74 69 6d 65 4e 6c | 69 6d 69 74 20 63 61 6e |s timeNl|imit can|
|00001100| 27 74 20 62 65 20 72 61 | 69 73 65 64 2e 20 20 41 |'t be ra|ised.  A|
|00001110| 6c 6c 20 79 6f 75 20 68 | 61 76 65 20 74 6f 20 64 |ll you h|ave to d|
|00001120| 6f 20 69 73 20 6d 6f 76 | 65 20 74 68 65 20 72 61 |o is mov|e the ra|
|00001130| 69 73 65 20 74 69 6d 65 | 20 6c 69 6d 69 74 20 62 |ise time| limit b|
|00001140| 65 66 6f 72 65 30 28 74 | 68 65 20 63 6f 6d 6d 61 |efore0(t|he comma|
|00001150| 6e 64 20 74 6f 20 61 70 | 70 65 6e 65 64 20 74 68 |nd to ap|pened th|
|00001160| 65 20 73 63 72 61 74 63 | 68 20 66 69 6c 65 2e 00 |e scratc|h file..|
|00001170| 2f 43 61 6c 6c 65 72 27 | 73 20 63 6c 65 61 72 65 |/Caller'|s cleare|
|00001180| 6e 63 65 20 68 61 73 20 | 62 65 65 6e 20 70 65 72 |nce has |been per|
|00001190| 6d 61 6e 74 6c 79 20 72 | 61 69 73 65 64 20 74 6f |mantly r|aised to|
|000011a0| 09 54 68 65 20 6d 65 6e | 75 20 18 20 77 6f 75 6c |.The men|u . woul|
|000011b0| 64 20 6e 6f 77 20 62 65 | 20 64 69 73 70 6c 61 79 |d now be| display|
|000011c0| 65 64 2e 45 0c 53 63 72 | 61 74 63 68 20 66 69 6c |ed.E.Scr|atch fil|
|000011d0| 65 79 f7 77 46 31 18 c7 | ea 80                   |ey.wF1..|..      |
+--------+-------------------------+-------------------------+--------+--------+